perm filename Z2X19.DAT[SCR,LCS] blob sn#219675 filedate 1976-06-17 generic text, type T, neo UTF8
 RCDFLG←-1; 
 
  < Z2X19.DAT  --  RANDOM NUMBER=     1
 PLAY;
 TOOT      0.00     0.21 523.25 800.00 F1    F3      0.00   0.00   0.00   0.00
         0.00  19.00
;PRINT(P1);< TOOT    1
 BUZZ      0.00     0.33  65.41  1200.00 F2      0.00   0.00   0.00 F6      0.00
         0.00  12.00
;PRINT(P1);< BUZZ    1
 TOOT      0.21     0.21 542.69 800.00 F1    F3      0.00   0.00   0.00   0.00
         1.00  19.00
;PRINT(P1);< TOOT    2
 BUZZ      0.33     0.33  69.30  1200.00 F2      0.00   0.00   0.00 F6      0.00
         1.00  12.00
;PRINT(P1);< BUZZ    2
 TOOT      0.42     0.21 562.86 800.00 F1    F3      0.00   0.00   0.00   0.00
         2.00  19.00
;PRINT(P1);< TOOT    3
 TOOT      0.63     0.21 583.77 800.00 F1    F3      0.00   0.00   0.00   0.00
         3.00
;PRINT(P1);< TOOT    4
 BUZZ      0.66     0.33  73.42  1200.00 F2      0.00   0.00   0.00 F6      0.00
         2.00  12.00
;PRINT(P1);< BUZZ    3
 TOOT      0.84     0.21 605.46 800.00 F1    F3      0.00   0.00   0.00   0.00
         4.00  19.00
;PRINT(P1);< TOOT    5
 BUZZ      0.99     0.34  77.78  1200.00 F2      0.00   0.00   0.00 F6      0.00
         3.00  12.00
;PRINT(P1);< BUZZ    4
 TOOT      1.05     0.21 627.95 800.00 F1    F3      0.00   0.00   0.00   0.00
         5.00  19.00
;PRINT(P1);< TOOT    6
 TOOT      1.26     0.21 651.29 800.00 F1    F3      0.00   0.00   0.00   0.00
         6.00
;PRINT(P1);< TOOT    7
 BUZZ      1.33     0.33  82.41  1200.00 F2      0.00   0.00   0.00 F6      0.00
         4.00  12.00
;PRINT(P1);< BUZZ    5
 TOOT      1.47     0.21 675.49 800.00 F1    F3      0.00   0.00   0.00   0.00
         7.00  19.00
;PRINT(P1);< TOOT    8
 BUZZ      1.66     0.33  87.31  1200.00 F2      0.00   0.00   0.00 F6      0.00
         5.00  12.00
;PRINT(P1);< BUZZ    6
 TOOT      1.68     0.21 700.58 800.00 F1    F3      0.00   0.00   0.00   0.00
         8.00  19.00
;PRINT(P1);< TOOT    9
 TOOT      1.89     0.21 726.61 800.00 F1    F3      0.00   0.00   0.00   0.00
         9.00
;PRINT(P1);< TOOT   10
 BUZZ      1.99     0.34  92.50  1200.00 F2      0.00   0.00   0.00 F6      0.00
         6.00  12.00
;PRINT(P1);< BUZZ    7
 TOOT      2.10     0.21 753.61 800.00 F1    F3      0.00   0.00   0.00   0.00
        10.00  19.00
;PRINT(P1);< TOOT   11
 TOOT      2.31     0.21 781.61 800.00 F1    F3      0.00   0.00   0.00   0.00
        11.00
;PRINT(P1);< TOOT   12
 BUZZ      2.33     0.33  98.00  1200.00 F2      0.00   0.00   0.00 F6      0.00
         7.00  12.00
;PRINT(P1);< BUZZ    8
 TOOT      2.52     0.21 810.65 800.00 F1    F3      0.00   0.00   0.00   0.00
        12.00  19.00
;PRINT(P1);< TOOT   13
 BUZZ      2.66     0.33 103.83  1200.00 F2      0.00   0.00   0.00 F6      0.00
         8.00  12.00
;PRINT(P1);< BUZZ    9
 TOOT      2.73     0.21 840.77 800.00 F1    F3      0.00   0.00   0.00   0.00
        13.00  19.00
;PRINT(P1);< TOOT   14
 TOOT      2.94     0.21 872.01 800.00 F1    F3      0.00   0.00   0.00   0.00
        14.00
;PRINT(P1);< TOOT   15
 BUZZ      2.99     0.34 110.00  1200.00 F2      0.00   0.00   0.00 F6      0.00
         9.00  12.00
;PRINT(P1);< BUZZ   10
 TOOT      3.15     0.21 904.41 800.00 F1    F3      0.00   0.00   0.00   0.00
        15.00  19.00
;PRINT(P1);< TOOT   16
 BUZZ      3.33     0.33 116.54  1200.00 F2      0.00   0.00   0.00 F6      0.00
        10.00  12.00
;PRINT(P1);< BUZZ   11
 TOOT      3.36     0.21 938.01 800.00 F1    F3      0.00   0.00   0.00   0.00
        16.00  19.00
;PRINT(P1);< TOOT   17
 TOOT      3.57     0.21 972.87 800.00 F1    F3      0.00   0.00   0.00   0.00
        17.00
;PRINT(P1);< TOOT   18
 BUZZ      3.66     0.33 123.47  1200.00 F2      0.00   0.00   0.00 F6      0.00
        11.00  12.00
;PRINT(P1);< BUZZ   12
 TOOT      3.78     0.22  1009.01 800.00 F1    F3      0.00   0.00   0.00   0.00
        18.00  19.00
;PRINT(P1);< TOOT   19
 BUZZ      3.99     1.00 130.81  1200.00 F2      0.00   0.00   0.00 F6      0.00
        12.00  12.00
;PRINT(P1);< BUZZ   13
 TOOT      4.00     1.00  1046.50 800.00 F1    F3      0.00   0.00   0.00   0.00
        19.00  19.00
;PRINT(P1);< TOOT   20
 FINISH; < Z2X19.DAT